www.gusucode.com > Neutrosophic logic toolbox Package_ Neutrosophic Matrices > Neutrosophic logic toolbox Package_ Neutrosophic Matrices/@nm/complement2.m

    function At=complement2(A);
% function st=disp_intui(A);
% complement of type2 single valued neutrosophic matrix A 
% "A" have to be single valued neutrosophic  matrix - "nm" object:
a.m=1-A.m;
a.i=1-A.i;
a.n=1-A.n;
At=nm(a.m,a.i,a.n);